object FmPat: TFmPat
  Left = 300
  Top = 263
  Caption = 'FmPat'
  ClientHeight = 781
  ClientWidth = 944
  Color = clBtnFace
  Font.Charset = DEFAULT_CHARSET
  Font.Color = clWindowText
  Font.Height = -13
  Font.Name = 'Tahoma'
  Font.Style = []
  OldCreateOrder = False
  Position = poDesigned
  OnCloseQuery = FormCloseQuery
  PixelsPerInch = 96
  TextHeight = 16
  object PcPAT: TPageControl
    Left = 0
    Top = 57
    Width = 944
    Height = 724
    ActivePage = TbChild
    Align = alClient
    DoubleBuffered = False
    MultiLine = True
    ParentDoubleBuffered = False
    TabOrder = 0
    object TbINFO: TTabSheet
      Caption = #1055#1072#1089#1087#1086#1088#1090#1085#1072#1103' '#1095#1072#1089#1090#1100
      inline PasportFr1: TPasportFr
        Left = 0
        Top = 0
        Width = 923
        Height = 757
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clWindowText
        Font.Height = -13
        Font.Name = 'Tahoma'
        Font.Style = []
        ParentFont = False
        TabOrder = 0
        ExplicitHeight = 757
        inherited PageControl1: TPageControl
          ActivePage = PasportFr1.TabSheet2
          inherited TabSheet1: TTabSheet
            ExplicitLeft = 4
            ExplicitTop = 27
            ExplicitWidth = 915
            ExplicitHeight = 666
          end
          inherited TabSheet2: TTabSheet
            ExplicitLeft = 4
            ExplicitTop = 27
            ExplicitWidth = 915
            ExplicitHeight = 666
          end
          inherited TabSheet3: TTabSheet
            ExplicitLeft = 4
            ExplicitTop = 27
            ExplicitWidth = 915
            ExplicitHeight = 666
            inherited GroupBox1: TGroupBox
              TabOrder = 1
            end
            inherited GroupBox2: TGroupBox
              TabOrder = 3
              inherited DBEdit11: TDBEdit
                TabOrder = 1
              end
              inherited DBEdit12: TDBEdit
                TabOrder = 0
              end
            end
            inherited GroupBox6: TGroupBox
              TabOrder = 0
              inherited DBEdit14: TDBEdit
                TabOrder = 2
              end
              inherited DBEdit13: TDBEdit
                TabOrder = 0
              end
              inherited MonthCalendar1: TMonthCalendar
                Date = 41467.077085925930000000
                TabOrder = 4
              end
              inherited Button1: TButton
                TabOrder = 1
              end
              inherited Button2: TButton
                TabOrder = 3
              end
            end
            inherited GroupBox7: TGroupBox
              TabOrder = 2
              inherited DBEdit10: TDBEdit
                TabOrder = 3
              end
              inherited DBEdit4: TDBEdit
                TabOrder = 1
              end
              inherited DBEdit5: TDBEdit
                TabOrder = 2
              end
              inherited DBEdit6: TDBEdit
                TabOrder = 6
              end
              inherited DBEdit7: TDBEdit
                TabOrder = 4
              end
              inherited DBEdit9: TDBEdit
                TabOrder = 5
              end
            end
            inherited GroupBox8: TGroupBox
              inherited DBEdit26: TDBEdit
                TabOrder = 3
              end
              inherited DBMemo2: TDBMemo
                TabOrder = 1
              end
              inherited DBMemo3: TDBMemo
                TabOrder = 2
              end
            end
          end
          inherited TabSheet4: TTabSheet
            ExplicitLeft = 4
            ExplicitTop = 27
            ExplicitWidth = 915
            ExplicitHeight = 666
          end
        end
      end
    end
    object TbChild: TTabSheet
      Caption = #1056#1077#1073#1077#1085#1086#1082
      ImageIndex = 1
      object ScrollBox1: TScrollBox
        Left = 0
        Top = 81
        Width = 936
        Height = 612
        Align = alClient
        BorderStyle = bsNone
        TabOrder = 0
        OnMouseWheelDown = ScrollBox1MouseWheelDown
        OnMouseWheelUp = ScrollBox1MouseWheelUp
        inline FrNeonatolog1: TFrNeonatolog
          Left = 0
          Top = 0
          Width = 920
          Height = 1182
          Align = alTop
          Font.Charset = DEFAULT_CHARSET
          Font.Color = clWindowText
          Font.Height = -13
          Font.Name = 'Tahoma'
          Font.Style = []
          ParentFont = False
          TabOrder = 0
          ExplicitWidth = 920
          ExplicitHeight = 1182
          inherited PageControl1: TPageControl
            Width = 920
            Height = 1182
            ActivePage = FrNeonatolog1.TshVackcin
            ExplicitWidth = 920
            ExplicitHeight = 1182
            inherited TabSheet1: TTabSheet
              ExplicitLeft = 4
              ExplicitTop = 27
              ExplicitWidth = 793
              ExplicitHeight = 1173
              inherited Calendar_neonat: TMonthCalendar
                Date = 41476.077123252320000000
              end
            end
            inherited TSBlog_PEDIATRICIAN: TTabSheet
              ExplicitLeft = 4
              ExplicitTop = 27
              ExplicitWidth = 793
              ExplicitHeight = 1173
              inherited ScrollBox_BlogPed: TScrollBox
                inherited mcBlogCal: TMonthCalendar
                  Date = 41477.077123645830000000
                end
              end
            end
            inherited TSFirst_Inspection: TTabSheet
              ExplicitLeft = 4
              ExplicitTop = 27
              ExplicitWidth = 793
              ExplicitHeight = 1173
              inherited McFirstOsm: TMonthCalendar
                Date = 41477.077126712960000000
              end
            end
            inherited TshMedSestr: TTabSheet
              ExplicitLeft = 4
              ExplicitTop = 27
              ExplicitWidth = 793
              ExplicitHeight = 1173
            end
            inherited tshVskarmlivanie: TTabSheet
              ExplicitLeft = 4
              ExplicitTop = 27
              ExplicitWidth = 793
              ExplicitHeight = 1173
            end
            inherited TshVackcin: TTabSheet
              ExplicitLeft = 4
              ExplicitTop = 27
              ExplicitWidth = 912
              ExplicitHeight = 1151
              inherited ScrollBox_Vackcin: TScrollBox
                Width = 912
                ExplicitWidth = 912
                inherited FrVakcina1: TFrVakcina
                  Width = 908
                  ExplicitWidth = 908
                  inherited DBGrid1: TDBGrid
                    Columns = <
                      item
                        Expanded = False
                        FieldName = 'DATA_VAKCINA'
                        Visible = True
                      end
                      item
                        Expanded = False
                        FieldName = 'DEN_WIZNI'
                        Width = 82
                        Visible = True
                      end
                      item
                        Expanded = False
                        FieldName = 'DOZA'
                        Width = 84
                        Visible = True
                      end
                      item
                        Expanded = False
                        FieldName = 'SROK_GODN'
                        Width = 103
                        Visible = True
                      end
                      item
                        Expanded = False
                        FieldName = 'VID_VAKCINY'
                        Width = 137
                        Visible = True
                      end
                      item
                        Expanded = False
                        FieldName = 'REAKSIA'
                        Width = 156
                        Visible = True
                      end
                      item
                        Expanded = False
                        FieldName = 'FIO_MS_LOOK'
                        Width = 171
                        Visible = True
                      end>
                  end
                end
              end
            end
            inherited TSEpicrisis: TTabSheet
              ExplicitLeft = 4
              ExplicitTop = 27
              ExplicitWidth = 793
              ExplicitHeight = 1173
              inherited mcEpik: TMonthCalendar
                Date = 41477.077127650460000000
              end
            end
          end
        end
      end
      object ScrollBox3: TScrollBox
        Left = 0
        Top = 0
        Width = 936
        Height = 81
        Align = alTop
        BorderStyle = bsNone
        TabOrder = 1
        object lbNUMBER_HISTORY_CHILD: TLabel
          Left = 394
          Top = 8
          Width = 88
          Height = 16
          Caption = #1053#1086#1084#1077#1088' '#1080#1089#1090#1086#1088#1080#1080
          FocusControl = DBEdit1
        end
        object DBGrid1: TDBGrid
          Left = 0
          Top = 0
          Width = 388
          Height = 65
          Align = alCustom
          BorderStyle = bsNone
          DataSource = dmMain.dsCild
          FixedColor = clLime
          Font.Charset = DEFAULT_CHARSET
          Font.Color = clWindowText
          Font.Height = -13
          Font.Name = 'Tahoma'
          Font.Style = []
          Options = [dgIndicator, dgColumnResize, dgColLines, dgRowLines, dgTabs, dgConfirmDelete, dgCancelOnExit, dgTitleClick, dgTitleHotTrack]
          ParentFont = False
          TabOrder = 0
          TitleFont.Charset = DEFAULT_CHARSET
          TitleFont.Color = clWindowText
          TitleFont.Height = -13
          TitleFont.Name = 'Tahoma'
          TitleFont.Style = []
          Columns = <
            item
              Expanded = False
              FieldName = 'CHILD_BD'
              Visible = True
            end
            item
              Expanded = False
              FieldName = 'BD_TIME'
              Visible = True
            end
            item
              Expanded = False
              FieldName = 'NUMBER_HISTORY_CHILD'
              Visible = True
            end>
        end
        object btChildSave: TBitBtn
          Left = 613
          Top = 19
          Width = 75
          Height = 25
          Caption = 'btChildSave'
          TabOrder = 1
          OnClick = btChildSaveClick
        end
        object btChildAdd: TBitBtn
          Left = 514
          Top = 3
          Width = 75
          Height = 25
          Caption = 'btChildAdd'
          TabOrder = 2
          OnClick = btChildAddClick
        end
        object btChildDel: TBitBtn
          Left = 514
          Top = 34
          Width = 75
          Height = 25
          Caption = 'btChildDel'
          TabOrder = 3
          OnClick = btChildDelClick
        end
        object DBEdit1: TDBEdit
          Left = 394
          Top = 24
          Width = 88
          Height = 24
          DataField = 'NUMBER_HISTORY_CHILD'
          DataSource = dmMain.dsCild
          TabOrder = 4
        end
      end
    end
    object TbTemper: TTabSheet
      Caption = #1058#1077#1084#1087#1077#1088#1072#1090#1091#1088#1085#1099#1081' '#1083#1080#1089#1090
      ImageIndex = 2
      inline Fr_Temper1: TFr_Temper
        Left = 0
        Top = 0
        Width = 895
        Height = 606
        TabOrder = 0
        inherited DBGrid1: TDBGrid
          Width = 270
          TitleFont.Height = -13
          Columns = <
            item
              Expanded = False
              FieldName = 'TEMP_DATA'
              Visible = True
            end
            item
              Expanded = False
              FieldName = 'TEMP_TIME'
              Width = 67
              Visible = True
            end
            item
              Expanded = False
              FieldName = 'TEMP'
              Visible = True
            end>
        end
        inherited DBChart1: TDBChart
          Left = 288
          ExplicitLeft = 288
        end
      end
    end
    object tbDavlenie: TTabSheet
      Caption = #1044#1072#1074#1083#1077#1085#1080#1077
      ImageIndex = 3
      inline FrDavlenie1: TFrDavlenie
        Left = 0
        Top = 0
        Width = 923
        Height = 693
        Align = alLeft
        TabOrder = 0
        ExplicitHeight = 693
        inherited DBGrid1: TDBGrid
          TitleFont.Height = -13
        end
      end
    end
    object tbNaznPat: TTabSheet
      Caption = #1053#1072#1079#1085#1072#1095#1077#1085#1080#1103
      ImageIndex = 4
      inline FrNaznPat1: TFrNaznPat
        Left = 0
        Top = 3
        Width = 805
        Height = 627
        TabOrder = 0
        ExplicitTop = 3
        inherited LbNaznachPat: TLabel
          Width = 75
          Height = 16
          ExplicitWidth = 75
          ExplicitHeight = 16
        end
        inherited lbAnalyzPat: TLabel
          Width = 56
          Height = 16
          ExplicitWidth = 56
          ExplicitHeight = 16
        end
        inherited Label1: TLabel
          Width = 81
          Height = 16
          ExplicitWidth = 81
          ExplicitHeight = 16
        end
        inherited DBGrid1: TDBGrid
          TitleFont.Height = -13
        end
        inherited DBGrid2: TDBGrid
          TitleFont.Height = -13
        end
        inherited DBGrid3: TDBGrid
          TitleFont.Height = -13
        end
      end
    end
    object TabSheet1: TTabSheet
      Caption = #1048#1089#1090#1086#1088#1080#1103' '#1088#1086#1076#1086#1074
      ImageIndex = 5
      object ScrollBox4: TScrollBox
        Left = 0
        Top = 0
        Width = 936
        Height = 693
        Align = alClient
        TabOrder = 0
        inline FrEpikriz1: TFrEpikriz
          Left = 0
          Top = 0
          Width = 932
          Height = 689
          Align = alClient
          TabOrder = 0
          ExplicitWidth = 932
          ExplicitHeight = 689
          inherited PageControl1: TPageControl
            Width = 932
            Height = 689
            ExplicitLeft = 0
            ExplicitTop = 0
            ExplicitWidth = 932
            ExplicitHeight = 689
            inherited TabSheet3: TTabSheet
              ExplicitLeft = 4
              ExplicitTop = 27
              ExplicitWidth = 987
              ExplicitHeight = 848
              inherited GroupBox3: TGroupBox
                inherited Label32: TLabel
                  Width = 106
                  Height = 16
                  ExplicitWidth = 106
                  ExplicitHeight = 16
                end
                inherited Label33: TLabel
                  Width = 78
                  Height = 16
                  ExplicitWidth = 78
                  ExplicitHeight = 16
                end
                inherited Label34: TLabel
                  Width = 161
                  Height = 16
                  ExplicitWidth = 161
                  ExplicitHeight = 16
                end
                inherited Label35: TLabel
                  Width = 102
                  Height = 16
                  ExplicitWidth = 102
                  ExplicitHeight = 16
                end
                inherited Label36: TLabel
                  Width = 78
                  Height = 16
                  ExplicitWidth = 78
                  ExplicitHeight = 16
                end
                inherited Label37: TLabel
                  Width = 223
                  Height = 16
                  ExplicitWidth = 223
                  ExplicitHeight = 16
                end
                inherited Label38: TLabel
                  Width = 198
                  Height = 16
                  ExplicitWidth = 198
                  ExplicitHeight = 16
                end
                inherited Label39: TLabel
                  Width = 47
                  Height = 16
                  ExplicitWidth = 47
                  ExplicitHeight = 16
                end
                inherited Label40: TLabel
                  Width = 159
                  Height = 16
                  ExplicitWidth = 159
                  ExplicitHeight = 16
                end
                inherited Label41: TLabel
                  Width = 41
                  Height = 16
                  ExplicitWidth = 41
                  ExplicitHeight = 16
                end
                inherited Label42: TLabel
                  Width = 50
                  Height = 16
                  ExplicitWidth = 50
                  ExplicitHeight = 16
                end
                inherited Label43: TLabel
                  Width = 54
                  Height = 16
                  ExplicitWidth = 54
                  ExplicitHeight = 16
                end
                inherited Label44: TLabel
                  Width = 58
                  Height = 16
                  ExplicitWidth = 58
                  ExplicitHeight = 16
                end
                inherited Label45: TLabel
                  Width = 107
                  Height = 16
                  ExplicitWidth = 107
                  ExplicitHeight = 16
                end
                inherited Label46: TLabel
                  Width = 28
                  Height = 16
                  ExplicitWidth = 28
                  ExplicitHeight = 16
                end
                inherited Label47: TLabel
                  Width = 57
                  Height = 16
                  ExplicitWidth = 57
                  ExplicitHeight = 16
                end
                inherited Label48: TLabel
                  Width = 141
                  Height = 16
                  ExplicitWidth = 141
                  ExplicitHeight = 16
                end
                inherited Label49: TLabel
                  Width = 58
                  Height = 16
                  ExplicitWidth = 58
                  ExplicitHeight = 16
                end
                inherited Label50: TLabel
                  Width = 57
                  Height = 16
                  ExplicitWidth = 57
                  ExplicitHeight = 16
                end
                inherited Label19: TLabel
                  Width = 19
                  Height = 16
                  ExplicitWidth = 19
                  ExplicitHeight = 16
                end
                inherited DBComboBox4: TDBComboBox
                  Height = 24
                  ExplicitHeight = 24
                end
                inherited DBEdit2: TDBEdit
                  Height = 24
                  ExplicitHeight = 24
                end
                inherited DBEdit3: TDBEdit
                  Height = 24
                  ExplicitHeight = 24
                end
                inherited DBEdit4: TDBEdit
                  Height = 24
                  ExplicitHeight = 24
                end
                inherited DBEdit5: TDBEdit
                  Height = 24
                  ExplicitHeight = 24
                end
                inherited DBEdit6: TDBEdit
                  Height = 24
                  ExplicitHeight = 24
                end
                inherited DBEdit7: TDBEdit
                  Height = 24
                  ExplicitHeight = 24
                end
                inherited DBEdit8: TDBEdit
                  Height = 24
                  ExplicitHeight = 24
                end
                inherited DBEdit9: TDBEdit
                  Height = 24
                  ExplicitHeight = 24
                end
                inherited DBEdit10: TDBEdit
                  Height = 24
                  ExplicitHeight = 24
                end
                inherited DBEdit11: TDBEdit
                  Height = 24
                  ExplicitHeight = 24
                end
                inherited DBEdit17: TDBEdit
                  Height = 24
                  ExplicitHeight = 24
                end
                inherited DBEdit18: TDBEdit
                  Height = 24
                  ExplicitHeight = 24
                end
                inherited DBEdit19: TDBEdit
                  Height = 24
                  ExplicitHeight = 24
                end
                inherited DBEdit20: TDBEdit
                  Height = 24
                  ExplicitHeight = 24
                end
                inherited DBLookupComboBox7: TDBLookupComboBox
                  Height = 24
                  ExplicitHeight = 24
                end
                inherited DBLookupComboBox8: TDBLookupComboBox
                  Height = 24
                  ExplicitHeight = 24
                end
                inherited DBLookupComboBox3: TDBLookupComboBox
                  Height = 24
                  ExplicitHeight = 24
                end
                inherited DBLookupComboBox4: TDBLookupComboBox
                  Height = 24
                  ExplicitHeight = 24
                end
                inherited DBLookupComboBox9: TDBLookupComboBox
                  Height = 24
                  ExplicitHeight = 24
                end
              end
            end
            inherited TabSheet2: TTabSheet
              ExplicitLeft = 4
              ExplicitTop = 27
              ExplicitWidth = 987
              ExplicitHeight = 848
              inherited GroupBox2: TGroupBox
                inherited Label13: TLabel
                  Width = 77
                  Height = 16
                  ExplicitWidth = 77
                  ExplicitHeight = 16
                end
                inherited Label14: TLabel
                  Width = 62
                  Height = 16
                  ExplicitWidth = 62
                  ExplicitHeight = 16
                end
                inherited Label15: TLabel
                  Width = 92
                  Height = 16
                  ExplicitWidth = 92
                  ExplicitHeight = 16
                end
                inherited Label16: TLabel
                  Width = 400
                  Height = 16
                  ExplicitWidth = 400
                  ExplicitHeight = 16
                end
                inherited Label17: TLabel
                  Width = 263
                  Height = 16
                  ExplicitWidth = 263
                  ExplicitHeight = 16
                end
                inherited Label22: TLabel
                  Width = 4
                  Height = 16
                  ExplicitWidth = 4
                  ExplicitHeight = 16
                end
                inherited Label26: TLabel
                  Width = 4
                  Height = 16
                  ExplicitWidth = 4
                  ExplicitHeight = 16
                end
                inherited Label28: TLabel
                  Width = 31
                  Height = 16
                  ExplicitWidth = 31
                  ExplicitHeight = 16
                end
                inherited Label29: TLabel
                  Width = 148
                  Height = 16
                  ExplicitWidth = 148
                  ExplicitHeight = 16
                end
                inherited Label30: TLabel
                  Width = 315
                  Height = 16
                  ExplicitWidth = 315
                  ExplicitHeight = 16
                end
                inherited Label31: TLabel
                  Width = 157
                  Height = 16
                  ExplicitWidth = 157
                  ExplicitHeight = 16
                end
                inherited Label51: TLabel
                  Width = 122
                  Height = 16
                  ExplicitWidth = 122
                  ExplicitHeight = 16
                end
                inherited Label52: TLabel
                  Width = 95
                  Height = 16
                  ExplicitWidth = 95
                  ExplicitHeight = 16
                end
                inherited Label53: TLabel
                  Width = 228
                  Height = 16
                  ExplicitWidth = 228
                  ExplicitHeight = 16
                end
                inherited Label55: TLabel
                  Width = 64
                  Height = 16
                  ExplicitWidth = 64
                  ExplicitHeight = 16
                end
                inherited Label56: TLabel
                  Width = 22
                  Height = 16
                  ExplicitWidth = 22
                  ExplicitHeight = 16
                end
                inherited Label57: TLabel
                  Width = 5
                  Height = 16
                  ExplicitWidth = 5
                  ExplicitHeight = 16
                end
                inherited Label58: TLabel
                  Width = 53
                  Height = 16
                  ExplicitWidth = 53
                  ExplicitHeight = 16
                end
                inherited Label59: TLabel
                  Width = 120
                  Height = 16
                  ExplicitWidth = 120
                  ExplicitHeight = 16
                end
                inherited Label60: TLabel
                  Width = 15
                  Height = 16
                  ExplicitWidth = 15
                  ExplicitHeight = 16
                end
                inherited Label61: TLabel
                  Width = 28
                  Height = 16
                  ExplicitWidth = 28
                  ExplicitHeight = 16
                end
                inherited Label12: TLabel
                  Width = 222
                  Height = 16
                  ExplicitWidth = 222
                  ExplicitHeight = 16
                end
                inherited Label18: TLabel
                  Width = 178
                  Height = 16
                  ExplicitWidth = 178
                  ExplicitHeight = 16
                end
                inherited DBEdit14: TDBEdit
                  Height = 24
                  ExplicitHeight = 24
                end
                inherited DBEdit15: TDBEdit
                  Height = 24
                  ExplicitHeight = 24
                end
                inherited DBEdit16: TDBEdit
                  Height = 24
                  ExplicitHeight = 24
                end
                inherited DBEdit31: TDBEdit
                  Height = 24
                  ExplicitHeight = 24
                end
                inherited DBLookupComboBox5: TDBLookupComboBox
                  Height = 24
                  ExplicitHeight = 24
                end
                inherited DBEdit30: TDBEdit
                  Height = 24
                  ExplicitHeight = 24
                end
                inherited DBEdit32: TDBEdit
                  Height = 24
                  ExplicitHeight = 24
                end
                inherited DBEdit33: TDBEdit
                  Height = 24
                  ExplicitHeight = 24
                end
                inherited DBEdit1: TDBEdit
                  Height = 24
                  ExplicitHeight = 24
                end
                inherited DBLookupComboBox2: TDBLookupComboBox
                  Height = 24
                  ExplicitHeight = 24
                end
              end
            end
            inherited TabSheet1: TTabSheet
              ExplicitLeft = 4
              ExplicitTop = 27
              ExplicitWidth = 924
              ExplicitHeight = 658
              inherited GroupBox1: TGroupBox
                inherited Label1: TLabel
                  Width = 70
                  Height = 16
                  ExplicitWidth = 70
                  ExplicitHeight = 16
                end
                inherited Label3: TLabel
                  Width = 49
                  Height = 16
                  ExplicitWidth = 49
                  ExplicitHeight = 16
                end
                inherited Label2: TLabel
                  Width = 36
                  Height = 16
                  ExplicitWidth = 36
                  ExplicitHeight = 16
                end
                inherited Label4: TLabel
                  Width = 22
                  Height = 16
                  ExplicitWidth = 22
                  ExplicitHeight = 16
                end
                inherited Label5: TLabel
                  Width = 5
                  Height = 16
                  ExplicitWidth = 5
                  ExplicitHeight = 16
                end
                inherited Label6: TLabel
                  Width = 57
                  Height = 16
                  ExplicitWidth = 57
                  ExplicitHeight = 16
                end
                inherited Label7: TLabel
                  Width = 120
                  Height = 16
                  ExplicitWidth = 120
                  ExplicitHeight = 16
                end
                inherited Label8: TLabel
                  Width = 15
                  Height = 16
                  ExplicitWidth = 15
                  ExplicitHeight = 16
                end
                inherited Label9: TLabel
                  Width = 219
                  Height = 16
                  ExplicitWidth = 219
                  ExplicitHeight = 16
                end
                inherited Label10: TLabel
                  Width = 75
                  Height = 16
                  ExplicitWidth = 75
                  ExplicitHeight = 16
                end
                inherited Label11: TLabel
                  Width = 28
                  Height = 16
                  ExplicitWidth = 28
                  ExplicitHeight = 16
                end
                inherited Label62: TLabel
                  Width = 105
                  Height = 16
                  ExplicitWidth = 105
                  ExplicitHeight = 16
                end
                inherited DBEdit21: TDBEdit
                  Height = 24
                  ExplicitHeight = 24
                end
                inherited DBEdit22: TDBEdit
                  Height = 24
                  ExplicitHeight = 24
                end
                inherited DBEdit27: TDBEdit
                  Height = 24
                  ExplicitHeight = 24
                end
                inherited DBEdit28: TDBEdit
                  Height = 24
                  ExplicitHeight = 24
                end
                inherited DBEdit23: TDBEdit
                  Height = 24
                  ExplicitHeight = 24
                end
                inherited DBEdit24: TDBEdit
                  Height = 24
                  ExplicitHeight = 24
                end
                inherited DBEdit25: TDBEdit
                  Height = 24
                  ExplicitHeight = 24
                end
                inherited DBEdit29: TDBEdit
                  Height = 24
                  ExplicitHeight = 24
                end
                inherited DBLookupComboBox6: TDBLookupComboBox
                  Height = 24
                  ExplicitHeight = 24
                end
                inherited DBLookupComboBox1: TDBLookupComboBox
                  Height = 24
                  ExplicitHeight = 24
                end
              end
            end
          end
        end
      end
    end
    object TabSheet2: TTabSheet
      Caption = #1044#1080#1072#1075#1085#1086#1079
      ImageIndex = 6
      inline FrDiagnos1: TFrDiagnos
        Left = 8
        Top = 8
        Width = 913
        Height = 577
        TabOrder = 0
        ExplicitLeft = 8
        ExplicitTop = 8
        ExplicitWidth = 913
        ExplicitHeight = 577
        inherited GroupBox1: TGroupBox
          inherited DBGrid1: TDBGrid
            TitleFont.Height = -13
          end
        end
        inherited GroupBox2: TGroupBox
          inherited DBGrid2: TDBGrid
            TitleFont.Height = -13
          end
        end
      end
    end
    object TabSheet3: TTabSheet
      Caption = 'TabSheet3'
      ImageIndex = 7
      inline Dnevnik1: TDnevnik
        Left = 10
        Top = 16
        Width = 913
        Height = 577
        TabOrder = 0
        ExplicitLeft = 10
        ExplicitTop = 16
        ExplicitWidth = 913
        ExplicitHeight = 577
        inherited Label1: TLabel
          Width = 111
          Height = 16
          ExplicitWidth = 111
          ExplicitHeight = 16
        end
        inherited Label2: TLabel
          Width = 99
          Height = 16
          ExplicitWidth = 99
          ExplicitHeight = 16
        end
        inherited Label3: TLabel
          Width = 36
          Height = 16
          ExplicitWidth = 36
          ExplicitHeight = 16
        end
        inherited Label4: TLabel
          Width = 36
          Height = 16
          ExplicitWidth = 36
          ExplicitHeight = 16
        end
        inherited Label5: TLabel
          Width = 27
          Height = 16
          ExplicitWidth = 27
          ExplicitHeight = 16
        end
        inherited Label6: TLabel
          Width = 42
          Height = 16
          ExplicitWidth = 42
          ExplicitHeight = 16
        end
        inherited Label7: TLabel
          Width = 88
          Height = 16
          ExplicitWidth = 88
          ExplicitHeight = 16
        end
        inherited DBGrid1: TDBGrid
          TitleFont.Height = -13
        end
        inherited DBEdit1: TDBEdit
          Height = 24
          ExplicitHeight = 24
        end
        inherited DBEdit2: TDBEdit
          Height = 24
          ExplicitHeight = 24
        end
        inherited DBEdit3: TDBEdit
          Height = 24
          ExplicitHeight = 24
        end
        inherited DBEdit4: TDBEdit
          Height = 24
          ExplicitHeight = 24
        end
        inherited DBEdit5: TDBEdit
          Height = 24
          ExplicitHeight = 24
        end
        inherited DBEdit6: TDBEdit
          Height = 24
          ExplicitHeight = 24
        end
        inherited MonthCalendar1: TMonthCalendar
          Date = 41479.077260810180000000
        end
      end
    end
  end
  object ScrollBox2: TScrollBox
    Left = 0
    Top = 0
    Width = 944
    Height = 57
    Align = alTop
    BorderStyle = bsNone
    TabOrder = 1
    object laF: TLabel
      Left = 8
      Top = 0
      Width = 53
      Height = 16
      Caption = #1060#1072#1084#1080#1083#1080#1103
    end
    object LaI: TLabel
      Left = 130
      Top = 3
      Width = 23
      Height = 16
      Caption = #1048#1084#1103
    end
    object ChShablon_show: TCheckBox
      Left = 600
      Top = 17
      Width = 137
      Height = 17
      Caption = #1042#1082#1083#1102#1095#1080#1090#1100' '#1096#1072#1073#1083#1086#1085#1099
      TabOrder = 0
      OnClick = ChShablon_showClick
    end
    object edF: TDBEdit
      Left = 3
      Top = 22
      Width = 121
      Height = 24
      DataField = 'PAT_F'
      DataSource = dmMain.dsPat
      ReadOnly = True
      TabOrder = 1
    end
    object EdI: TDBEdit
      Left = 130
      Top = 22
      Width = 121
      Height = 24
      DataField = 'PAT_I'
      DataSource = dmMain.dsPat
      ReadOnly = True
      TabOrder = 2
    end
  end
end
